home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ClipArt Heaven 2
/
ClipArt Heaven 2.iso
/
utility
/
datashow
/
sound1.shw
< prev
next >
Wrap
Text File
|
1992-08-31
|
532b
|
12 lines
;*********************************************************************;
; Sciptname..: SOUND1.SHW ;
; Purpose....: Sub program to PROMOTE1.SHW (tight loop for sound). ;
;*********************************************************************;
MARK 1 ; Set a mark to jump to
MUSIC SOUND G 4 70
MUSIC SOUND D 4 70
VARIABLE INCREASE soundloop 1
IF soundloop 8 DO JUMPMARK 2
JUMPMARK 1 ; If we've reached here, jump to mark 1
MARK 2 ; Set a mark to jump to